-- card: 23910 from stack: in.0-2
-- bmap block id: 24285
-- flags: 0000
-- background id: 18737
-- name: fieldStyles
----- HyperTalk script -----
-- This handler stores the name of the last card.
on goBack
  go cd "Text Fields" of stack "Intro to HyperCard 2.0"
end goBack

on closeCard
  put "Type anything here." into cd fld "sampleFld"
  click at the loc of btn "Rectangle"
end closeCard

on changeTheFieldStyle
  deHiliteOtherBtns
  set the hilite of the target to true
  put the short name of the target into fieldStyle
  set the style of cd fld "sampleFld" to fieldStyle
end changeTheFieldStyle

on deHiliteOtherBtns
  repeat with n = 3 to 7
    set the hilite of btn id n to false
  end repeat
end deHiliteOtherBtns


-- part 1 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=112 top=164 right=229 bottom=361
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: sampleFld


-- part 3 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=135 top=234 right=256 bottom=253
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Transparent
----- HyperTalk script -----
on mouseUp
  changeTheFieldStyle
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=135 top=255 right=277 bottom=253
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Opaque
----- HyperTalk script -----
on mouseUp
  changeTheFieldStyle
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: C006
-- rect: left=252 top=234 right=256 bottom=389
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Rectangle
----- HyperTalk script -----
on mouseUp
  changeTheFieldStyle
end mouseUp



-- part 6 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=252 top=255 right=277 bottom=389
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Shadow
----- HyperTalk script -----
on mouseUp
  changeTheFieldStyle
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 8006
-- rect: left=192 top=276 right=298 bottom=329
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Scrolling
----- HyperTalk script -----
on mouseUp
  changeTheFieldStyle
end mouseUp



-- part contents for background part 1
----- text -----
Click the cursor in the box below (the cursor will change to show that you can enter text), and type anything you want. Then click the various buttons below to change the field style.

-- part contents for card part 1
----- text -----
Type anything here.